home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS in a Box 7
/
BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso
/
Files
/
Tele
/
C
/
Copy of FSP Control
< prev
next >
Wrap
Text File
|
1987-05-25
|
2KB
|
84 lines
* This is the "FSP Control" I use with FSP 2.1
*
* My main volume is named "DataFrame 20"
* There is a folder named "BBS", and that
* contains the application "Red Ryder Host"
* and other applications for use with Host,
* including FSP 2.1 . In this folder I also
* have 3 other folders named "Menus",
* "Sections", and "BU Sections".
*
* I have 4 File sections (and 4 Back-Up sections).
* They are called DL,UL,LibraryDL,and LibraryUL.
*
* By following along below, you should be able to
* see how this works.
*
* The "DL" section
*
LOAD "DataFrame 20:BBS:Sections:DL" ; load file section "DL"
PURGE ; remove files marked for deletion
CHECK/PATH ; check the path of the files
PURGE ; delete any files that aren't found
SORT/DATE ; sort file section by date
DELETE/DUPS ; delete any duplicate listings
PURGE ; remove dupl.files (old ones!)
SAVETEXT/DESC "DL-DATE" ; create text file sorted by date
SORT/TITLE ; sort file section by name
SAVETEXT/DESC "DL-NAME" ; create text file sorted by name
SAVE "DataFrame 20:BBS:Sections:DL" ; save the file section
SAVE "DataFrame 20:BBS:BU Sections: BU DL" ; create a back-up
CLEAR ; clear the memory for next section
*
* The "UL" section ; Now we repeat the steps above for other sections
*
LOAD "DataFrame 20:BBS:Sections:UL"
PURGE
CHECK/PATH
PURGE
SORT/DATE
DELETE/DUPS
PURGE
SAVETEXT/DESC "UL-DATE"
SORT/TITLE
SAVETEXT/DESC "UL-NAME"
SAVE "DataFrame 20:BBS:Sections:UL"
SAVE "DataFrame 20:BBS:BU Sections:BU UL"
CLEAR
*
* The "LibraryDL" section
*
LOAD "DataFrame 20:BBS:Sections:LibraryDL"
PURGE
CHECK/PATH
PURGE
SORT/DATE
DELETE/DUPS
PURGE
SAVETEXT/DESC "LibraryDL-DATE"
SORT/TITLE
SAVETEXT/DESC "LibraryDL-NAME"
SAVE "DataFrame 20:BBS:Sections:LibraryDL"
SAVE "DataFrame 20:BBS:BU Sections:BU LibraryDL"
CLEAR
*
* The "LibraryUL" section
*
LOAD "DataFrame 20:BBS:Sections:LibraryUL"
PURGE
CHECK/PATH
PURGE
SORT/DATE
DELETE/DUPS
PURGE
SAVETEXT/DESC "LibraryUL-DATE"
SORT/TITLE
SAVETEXT/DESC "LibraryUL-NAME"
SAVE "DataFrame 20:BBS:Sections:LibraryUL"
SAVE "DataFrame 20:BBS:BU Sections:BU LibraryUL"
CLEAR
*
* Now launch "Red Ryder Host" ; This will work as a CMN#50 also!
*
LAUNCH "Red Ryder Host"